Disc Station 11

home *** CD-ROM | disk | FTP | other *** search

/ Disc Station 11 / Disc Station Vol 11.iso / main_dat / omake / ds11hk.tpc < prev next >

Wrap

Text File | 1996-05-30 | 25KB | 786 lines

:TITLE @ph10 @CW @LAY0 @ph13 @WIN0 ; âpâîâbâgÉ▌ÆΦ @P 1,6,6,8 @P 2,7,7,9 @P 3,9,9,10 @P 4,10,10,11 ;----------- $XV=1 ;éwò√îⁿê┌ô«ù╩ $XA=0 ;éwò√îⁿë┴æ¼ôx $YV=0 ;éxò√îⁿê┌ô«ù╩ $YA=1 ;éxò√îⁿë┴æ¼ôx ;----------- $X1=5 ;Åæì₧é▌ê╩ÆuéPéwì└òW $Y1=5 ;Åæì₧é▌ê╩ÆuéPéxì└òW $X2=5 $Y2=5 $X3=5 $Y3=5 $X4=5 $Y4=5 $X5=5 $Y5=5 $X0=5 $Y0=5 ;----------- @L 24,20 écérò╥ÅWîπïLühéáé╞é╠é▄é┬éΦühüm@O10ë╜é⌐âLü[é≡ëƒé╡é─ë║é│éó@C15#ün @O1 $K=0 ;============================================================================== @WHILE $K==0 @W3 ;----------- @LO $X0,$Y0 @C 0 éáé╞é╠é▄é┬éΦ @KEY $K @LO $X1,$Y1 @C 1 éáé╞é╠é▄é┬éΦ @KEY $K @LO $X2,$Y2 @C 2 éáé╞é╠é▄é┬éΦ @KEY $K @LO $X3,$Y3 @C 3 éáé╞é╠é▄é┬éΦ @KEY $K @LO $X4,$Y4 @C 4 éáé╞é╠é▄é┬éΦ @KEY $K @LO $X5,$Y5 @C 15 éáé╞é╠é▄é┬éΦ @KEY $K ;----------- $CX=$XV+$XA $CX=$CX+$X5 @IF $CX > 2 :XOK1 $XV=0-$XV :XOK1 @IF $CX < 60:XOK2 $XV=0-$XV :XOK2 ;----------- $CY=$YV+$YA $CY=$CY+$Y5 @IF $CY > 2 :YOK1 $YV=0-$YV $YA=0-$YA :YOK1 @IF $CY < 35:YOK2 $YV=$YV+$YA $YV=0-$YV :YOK2 ;----------- $XV=$XV+$XA $YV=$YV+$YA ;----------- $X0=$X1 $X1=$X2 $X2=$X3 $X3=$X4 $X4=$X5 $X5=$X5+$XV ;----------- $Y0=$Y1 $Y1=$Y2 $Y2=$Y3 $Y3=$Y4 $Y4=$Y5 $Y5=$Y5+$YV ;----------- @KEY $K @WEND ;============================================================================== @CW@O @P 1, 5, 9,15 @P 2,15, 0, 0 @P 3,14, 2,15 @P 4, 1,13, 5 @PJ :HENK ;----------- @H :HENK ;---------------------------------------- @GP1150 ü@âjü[ânâIüIü@ïvüXécéré╔ôoÅΩé╠üwöÆù┤ûPü@ëαüxé╛üB ü@âWâââôâvâqü[âìü[é╞éóéñé▒é╞é┼âAâNâVâçâôâQü[âÇé≡è·æ╥é╡é╜Élé¬éóéΘé╞Ävéñé¬üAìíë±é═ âVâ~âàâîü[âVâçâôéqéoéfü{âAâhâxâôâ`ââü[é╔é╚é┴é╜üBé╚é║âWâââôâvâqü[âìü[é╠æσë∩é╔éΓé┬ éτé¬ÅoéΘé▒é╞é╔é╚é┴é╜é╠é⌐üAé╞éóéñôΣé╠òöò¬é≡Åæéóé╜é┬éαéΦé╛üBécérVol.éSé┼é═ârâèü[âh üEâoüEârü[âôé╞âCâöâ@âôüEâyâôâgâìâöâBâbâ`üEâMâôâtâXâLü[é╡é⌐Å╨ëεé┼é½é╚é⌐é┴é╜é¬üAÄ└ é═é▒é±é╚é╔âLâââëâNâ^ü[é¬éóé╜é±é╛éµé╚üBéµü[éΓé¡ô·é╠û┌é≡î⌐éΩé─éµé⌐é┴é╜é║üBé▒éΩé⌐éτ é═âWâââôâvâqü[âìü[é╠âLâââëâNâ^ü[é≡Ägé┴é╜âQü[âÇé≡âoâôâoâôì∞éΘù\ÆΦé╛é⌐éτüAïCé╔ôⁿé┴ é╜âLâââëé¬éóé╜éτÉlïCôèò[é╔êΩò[ôⁿéΩé─é¡éΩüB ü@ìíîπécéré┼éαüAâQü[âÇé╠èΘëµéΓüwé╠ü`âRâlüEânü[âgâëâôâhüxé≡éΓé┴é─éóé¡é±é┼üAìíîπé╞ éαéµéδé╡é¡é╚üIüI éaéÖü@ü@élécüwûéô▒ò¿îΩçTüxéαöâé┴é─é┘é╡éóüAöÆù┤ûPü@ëα@H @GP1150 ü@ìíë±é╠âWâââôâvâqü[âìü[èOô`é═üAé┐éσé▒é┴é╞é╛é»âAâjâüé╔é▒é╛éφé┴é─é▌é▄é╡é╜üBé╞é▒éδ é┼âAâjâüé╞éóéªé╬üAìæì█âAâjâüü[âVâçâôé¬ìíöNé▄é╜éáéΦé▄é╖é╦éÑüBâAâjâüü[âVâçâôìDé½é╚ Élé═üAé╚éΘé╫é¡î⌐é╔ìsé┴é╜é┘éñé¬éµéóé⌐éαüB ü@ü@ü@éaéÖü@ü@ï|ü@î╖âmÅò@H @GP1150 élérü|écénéré┼üAùVé╫éΘé╠éαé▒é╠éPéPìåé¬ì┼îπé╔é╚éΦé▄é╡é╜ éPéQìåé⌐éτé═évéëéÄéäéÅéùéôéXéTÉΩùpé╞éóéñÄûé╔é╚éΦé▄é╖ éPéQìåé⌐éτé═ü@é▄é╜ÉVé╜é╚ïCÄ¥é┐é┼âQü[âÇé≡é┬é¡é┴é─ìsé½é╜éóé┼é╖ üié»é╟Ä└ì█ü@Ä⌐ò¬é╠ÄdÄûé═éPéRìåé⌐éτé╚é╠é┼é╖üj é┼éαü@ÄµéΦè╕éªé╕é═ü@ìíé╠ÄdÄûì┼ùDÉµüIüI æüé¡è«É¼é│é╣é─éΣé┴é¡éΦé╡é╜éóé╚ü` shiki @H @GP1150 ü@é▒é±é┐éßü`é┴âXüIâAâzé╚âQü[âÇé╬é⌐éΦì∞é┴é─é╜üwâZâjâçü`âïë═ûküxé┼ é╖üBéóéΓü`üAécéré┼èFùlé╔é¿ë∩éóé╖éΘé╠éαïvé╡é╘éΦé┼é╖é╦üB ü@ìíë±é═üAéáé╠î╢é╠Æ┤æσì∞é╠üiù\ÆΦé╛é┴é╜üjüwâüâïâvü`âïâëâôâhüxé╠æ▒ ò╥é¬éqéoéfé┼ïAé┴é─é½é╜üIüIé╞éóéñé▒é╞é┼üAé▒é╠âQü[âÇé╠üwÉóèEè╧É▌ÆΦüx éΓüwâLâââëÉ▌ÆΦüxé╚é╟é╠î┤ëµüEè─ÅCé╞éóéñüAê╠é╗ü[é╚Äûé≡éΓéΦé▄é╡é╜üB ü@æOë±é╠âüâïâvü`âïé═é`ébésé╛é┴é╜é»é╟üAìíìåé╠âüâïâvü[âïé═èFé╠æσìD é½é╚âWâââôâïüIüwéqéoéfüxé┼üAÉóèEè╧éαé⌐é╚éΦìLé¬é┴é─éµéΦêΩæwâüâïâv ü`âïâëâôâhé╠ÅZÉlÆBé╠üwòΘé╡üxéΓüwò╢ë╗üxé¬ò¬é⌐é┴é╜é±é╢éßé╚éóé⌐é╚üH ü@æ╝é╠âQü[âÇï@Äφé┼éαé▒é╠üwâüâïâvü`âïâëâôâhüxî⌐é─é▌é╜éóüIé╞Ävé┴é╜ èFùlò√é╠é¿ÄΦÄåé¿æ╥é┐é╡é─é▄é╖üB üsâZâjâçü`âïë═ûké┼é╡é╜üt @H @GP1150 ü@ü@é▒é±é╔é┐é═üBé╟é╖é▒éóéjë¬é╞É\é╡é▄é╖üBò╥ÅWîπïLÿAì┌éUë±û┌é┼é╖üB ü@ü@é│é─üAé▒é╠ìåé┼é═üuâüâïâvü[âïâëâôâhéréöéÅéÆéëéàéôüvé╠âVâiâèâIé╞â}âbâvægé▌üA ü@â}âbâvâpü[âcé╠êΩòöé╚é╟é≡ÆSôûé╡é▄é╡é╜üB ü@ü@ìíë±é═éóéδéóéδé╚Ä└î▒ôIÄÄé▌é≡ìsé┴é╜é╣éóé┼üAé╚é⌐é╚é⌐é╠ô∩ÄYé┼é╡é╜é¬üAé╚é±é╞é⌐ ü@é▒é╠éµéñé╚î`é╔ùÄé┐Æàé½é▄é╡é╜üBé▒é╠ì∞òié╔æ╬é╖éΘé▓ê╙î⌐üAé▓è┤æzôÖé¬éáéΦé▄é╡é╜éτ ü@é║é╨é╞éαé¿ò╓éΦé¡é╛é│éóüBìíîπé╠ÄQìlé╔é│é╣é─éóé╜é╛é½é▄é╖üB ü@ü@é╗éñéóéªé╬üAé╞éñé╞éñécénéré╠écéréαìíìåé┼ì┼îπé╞é╚éΦé▄é╡é╜üBÅ¡é╡ÄΓé╡éóïCé¬é╡ ü@é▄é╖é¬üAé▒éΩéαÄ₧æπé╠ù¼éΩé┼é╡éσéñé⌐üBécénéréµüAé│éµéñé╚éτüB ü@ü@é┼é═üAÉVé╡é¡é╚é┴é╜écéré┼é¿ë∩éóé╡é▄é╡éσéñüI ü@ü@Æ╟ÉLü@Äƒìåé═üAì∞Ä╥Äµì▐é╠é╜é▀üAÄäé╠ò╥ÅWîπïLé═é¿ïxé▌é│é╣é─éóé╜é╛é¡ù\ÆΦé┼é╖üB ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ânâCâRâXâgâpâtâHü[â}âôâXé╚âVâiâèâIâëâCâ^ü[ü@é╟é╖é▒éóéjë¬@H @GP1150 ô╦æRé┼é╖é¬üwâJâëâIâPâéü[âhüxö¡ô«üIüI@W30 ü@ü@ü@üsêñé╠âüâïâvü`âïâëâôâhüt ü@ü@ì∞ÄîüFë═ôαü@û▓æ╛î█@W30 @WS5âüâïâvü`âïâëâôâhé═ûAé╠Æå@W20@WS @WS5üiâoâuâèü[@W5âoâuâèü[@W5âoâuâèü[üj @WS5ë┤é═êΩÉlé┼âvâìâOâëâÇ@W20@WS @WS5üiâìâôâèü[üj@WS@W20 @WS3âoâOé╛ü`üIüI@W10@WS @WS5üiâ_âuâïâìâôâèü[üj@WS @WS3û\æûé╛ü`üIüI@W10@WS @WS5üiâgâèâvâïâìâôâèü[üj@WS @WS3é▄é╜âoâOé╛ü`üIüI@W10@WS @WS5üiâëâuâèü[üj@WS @W20@WS5üiæΣÄîüj@WS @WS7éáé±é╜ü@@W10ïxé▌é╚é│éΩü`@WS @WS7@W10ïxé▌é╚é│éΩü`ü@@W12ïxé▌é╚é│éΩü`@W20@WS ü@üqïπÄlÄ«â_ü`âNâvâìâOâëâ}ü`ü@ü@ë═ôαü@û▓æ╛î█ür @H @GP1150 ü@ìíë±é═üAüuâüâïâvü[âïâëâôâh âXâgü[âèü[âYüvé╠ÄΦô`éóé≡éΓéΦé▄é╡é╜üAé╞éóéñé⌐éΓé┴ é─é▄é╖üBéóé½é╚éΦèGò┐é╠êßéñôGé¬î╗éΩé╜éτüAé╗éΩé═Ääé╠ò`éóé╜éΓé┬é┼é╡éσéñüB ü@âXâPâWâàü[âïé¬é½é┬é⌐é┴é╜é»é╟üAé╗éΩé═Ääé╠ÄΦé¬Æxéóé⌐éτé┼é╖üBé╞é┘é┘üB ü@é╗é±é┼éαé┴é─üAé▒é╠ÄdÄûé¬ÅIéφé┴é╜éτüiÄdÄûé╞é═ò╩é┼é╖é»é╟üjê╚æOé⌐éτî╛é┴é─éΘ âKâîü[âWâLâbâgé╠û∞û]é≡Éié▀é─é▌é╜éóé╞Ävé┴é─éΘÄƒæµé┼é╖üBöäéΦò¿é╔é╚é┴é╜éτéóéóé╚üB ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@éSîÄÅπÅ{ìáé╠ü@ü@ï░ù│ÆPÄ╘ üQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQüQ ü@ìíë±é═üAüuâüâïâvü[âïâëâôâh âXâgü[âèü[âYüvé≡üAÄΦô`éóé╟é▒éδé┼é═é╚éóé¡éτéóé╡é▄ é╡é╜üBìíé═üAâTâoâCâoâïâQü[âÇé╞âoâgâïâKâîâbâKé¬ÉSé╠Äxéªé┼é╖üB ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@éTîÄÅπÅ{ìáé╠ü@ü@ï░ù│ÆPÄ╘ @H @GP1150 ü@ïgÄRôNûτé┼é╖üBüwâüâïâvü[âïâëâôâhértoriesüxé╠èGé≡ò`éóé─é╜é±é╛âPâhüAì∞ï╞ö╝é╬é┼ âvâìâWâFâNâgé≡ö▓é»é─üAüwé¿é▄é»âRü[âiü[üxé╔æπéφéΘÉVâRü[âiü[é╠âVâXâeâÇì∞éΦéΓò╥É¼ é╚é╟é╔ÉΩöOé╡é─é▄é╖üBé╗éñüAéΓé┴é╞öOèΦé╠üuèΘëµÄ╥üvéτé╡éóÄdÄûé≡é╡é─éóéΘé╠é┼é╖üB ü@éPöNéáé▄éΦâfâUâCâiü[éΓé┴é─é╜é±é╛é»é╟üAéαé╞éαé╞éáé▄éΦèGé≡ò`é¡âqâgé┼é═é╚é⌐é┴é╜ é╠é┼üAé╞é─éαé╜éóé╓é±é┼é╡é╜üBé╞éΦéáéªé╕èGé╠ÄdÄûéαÅIéφéΦüié╞éóéñé⌐æ╝é╠âqâgé╔é▄é⌐ é╣é╜é±é╛âPâhüjüAé╡é╬éτé¡èGé═âvâëâCâxü[âgé┼æσìDé½é╚é¿âlâGé┐éßé±é╠âëâNâKâLÆ÷ôxé╔ é╞é╟é▀é─é¿é½é╜éóé╚âAüAé╚é╟é╞üB ü@é▒é╠écérVOL.éPéPé¬ö¡öäé│éΩéΘìáüAë┤é═âJâbâRâCâCînâAâNâVâçâôâQü[âÇé⌐ë╜é⌐é╠èΘëµ é≡âXâ^ü[âgé│é╣é─éΘé⌐âiüHü@é─é╚âJâôâWé┼é╖üB @W50@PH11 ü@ü@üqïπÄlÄ«â_ü[âNâëâCâ^ü[ürïgÄRü@ôNûτ @PH12@H @GP1150 ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@é╜é╩é½ü@é╠ü@Ävé╨Åoü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@éaéxü@éφé⌐ ü@ü@ü@ü@ü@ü@ü@ü@ü@ìíé┼é═ü@é╜é╩é½é╞éóé┴é╜éτü@é╜é╩âLâbâYü@é┼éáéΘé¬üA ü@ü@ü@ü@ü@ü@ü@ü@ìíé▄é┼é═ü@é╜é╩é½é╞éóé┴é╜éτü@é▌é╟éΦü@é┼éáé┴é╜üB ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@é▌é╟éΦü@é╞éóé┴é╜éτü@éóé╞éñ ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@éóé╞éñü@é╞éóé┴é╜éτü@ï¢ ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ï¢é╞éóé┴é╜éτü@âJâïâVâEâÇ ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@âJâïâVâEâÇü@é╞éóé┴é╜éτü@ïìô√ ü@ü@ïìô√ü@é╞éóé┴é╜éτü@ò@é⌐éτü@âuâqâàü[âbü@âQâuâQâ{ü@éΓüAéΓé▀éδéµü@Å╬éφé╣é±é╚éµ ü@ü@ü@ò@é⌐éτü@âuâqâàü[âbü@âQâuâQâ{ü@éΓüAéΓé▀éδéµü@Å╬éφé╣é±é╚éµü@é╞éóé┴é╜éτ ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@é╜é╩âLâbâY @H @GP1150 écéré┼é═Åëé▀é─ò╥ÅWîπïLé≡ò`é½é▄é╖üAé╞ü[é▄é╖Éàû∞é┼é╖üBÄvéóïNé▒é╣é╬û^ï╔öΘâvâìâWâFâNâgühéQéOÄ₧æσì∞Éφühé¬é┘é┌è«É¼è╘ï▀é╠éPéPîÄû^ô·é╠é▒é╞é┼é╡é╜üBé¬üAé╞éáéΘÄûÅεé┼âvâìâWâFâNâgé¬â{âcé╔é╚éΦüAïCò¬é¬Ådéóé▄é▄üAéΓé±é¬ü[ù╤üAéφé⌐ùªéóéΘé╜é╩é½îñïåÅèé╓Åoîⁿé╞é╚éΦüAÆ┤ï╔öΘôªé░âQü[âvâìâWâFâNâgüué╜é╩âLâbâYüvé╔ÄQë┴é╡é╜éφé»é┼é╖üBéáé┴é╒éΘé╗ü[é╖é╞âAâNâVâçâôé═ö¿é¬êßéñé╜é▀è╡éΩéΘé▄é┼ïΩÿJé╡é─é╡é▄éóüAé╜é╩é½îñïåÅèé╠âüâôâoü[éQÉlé╔û└ÿfé≡é⌐é»é─é╡é▄éóé▄é╡é╜üBé┘é±é╞èªï≤é╠ÆåüAûΘé╠éPü`éQÄ₧é▄é┼âoâJé╚ÿbé╡é─É╖éΦÅπé¬é┴é╜éΦüAühâTâCü¢ü[â{âbâcühé╠èεö╒öâé┴é─è∞é±é┼é╜éΦüAâ|âjü[âeü[âïé╠é⌐ü[éóéóé¿é╦ü[é┐éßé±é¬ìDé½é╛é⌐éτüuâ|âjü[âeâïæáüvé╚é±é─î─é╬éΩé─éΘÅΩìçé╢éßé╚éóé┼é╖é╚üié½é▌â_âüé╛üjüBé╡é⌐éαÄÄù√é═é╗éΩé╛é»é╔é╞é╟é▄éτé╕üAâ^âCâgâïé¬è«É¼é╡é╚éóé▄é▄âNâèâXâ}âXüAûYöNë∩üAô~ü¢â~üAÉ│îÄé≡ëzé╡é─é╡é▄éóüAöNé≡é═é│é±é╛éPæσâvâìâWâFâNâgé╔é╚é┴é─é╡é▄é┴é╜é╠é┼é╖üB ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ücéñé╗üB ü@é╞éΦéáéªé╕üAé┘é╠é┌é╠é╞é╡é╜ô«ò¿ë╞æ░êñüiüHüjé≡ò`éóé╜üué╜é╩âLâbâYüvé═èyé╡é▀é─éóé╜é╛é»é▄é╡é╜é┼é╡éσéñé⌐üHìíë±é═â}âbâvé╠êΩòöé╞â^âCâgâïé≡ÆSôûé╡é▄é╡é╜üBìí